installing package
library(devtools)
install_github("AbbassiNarjes/DETmapTun")
simulating data by state in testG and by delegation in testD using the included datasets tnMAP and tnMAPDELE
library(DETmap)
testG <- cbind(tnMAP$NAME_1,rnorm(n = 24,mean = 20,sd = 13),tnMAP$HASC_1)
## Loading required package: sp
testG=as.data.frame(testG)
testG[,2]=as.numeric(testG[,2])
testD <- cbind(tnMAPDELE@data[["NAME_2"]],tnMAPDELE@data[["HASC_2"]],tnMAPDELE@data[["NAME_1"]],rnorm(268,50,20))
testD=as.data.frame(testD)
testD[,4]=as.numeric(testD[,4])
Exemples with DELE_function
changing color and boundries color
DELE_function(data = testD,var=4,mapColor = c("green","blue","red"), DELEcode =2,showVar1 = 1,showVar2 = 4,showVar3 = 3,addLeg = T,prov= providers$Esri.WorldImagery,GovBoundaryColor="gold")
Exemples with Gov_function
Gov_function(data = testG,var=2,mapColor =c("pink","gray","black"),addLeg = T ,GOVcode = 3,prov = providers$Esri.WorldImagery,showVar1 = 1,showVar2 = 2)
removing legend
Gov_function(data = testG,var=2,mapColor =c("pink","gray","black"),addLeg = F ,GOVcode = 3,prov = providers$Esri.WorldImagery,showVar1 = 1,showVar2 = 2)
Exemples with DELEDotDensityMap
changing color and number of dots
DELEDotDensityMap(testD,DELEcode = 2,prov = providers$Esri.WorldImagery,polyColor = "white",dotColor = "green", polyEdgColor= "gold" ,var=4,OneDFor = 1)
## Checking rgeos availability: TRUE
Exemples with GovDotDensityMap
changing color and number of dots
GovDotDensityMap(testG,Govcode = 3,prov = providers$Esri.WorldImagery,polyColor = "white",dotColor = "green", polyEdgColor= "gold" ,var=2,OneDFor = 0.01)